home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1992 June: ROMin Holiday / ADC Developer CD (1992-06) (''ROMin Holiday'')_iso / Developer Connection - 06-1992.iso / Development Platforms / MPW Related / Animated Cursors / WindowTkl.c < prev    next >
Encoding:
C/C++ Source or Header  |  1990-09-14  |  6.9 KB  |  226 lines  |  [TEXT/MPS ]
  1. /******************************************************************************\
  2. * Header Files
  3. \******************************************************************************/
  4.  
  5. #include <Controls.h>
  6. #include <Desk.h>
  7. #include <Events.h>
  8. #include <Memory.h>
  9. #include <Script.h>
  10. #include <Windows.h>
  11. #include "CursWindTkl.h"
  12. #include "ShowCursor.h"
  13. #include "WindowTkl.h"
  14.  
  15.  
  16. /******************************************************************************\
  17. * Constants & Macros
  18. \******************************************************************************/
  19.  
  20. #define titleBarHeight 18 //Height of docWindProc title bar in pixels
  21. #define userWindMarg   50 //User window margin
  22. #define stdWindMarg    3  //Zoom window margin
  23.  
  24.  
  25. #pragma segment Main
  26. /******************************************************************************\
  27. * DoUpdateEvent - Handles a window update event
  28. *
  29. * DoUpdateEvent handles a window update event by drawing the window grow icon.
  30. \******************************************************************************/
  31.  
  32. void
  33. DoUpdateEvent (TheEvent)
  34.     EventRecord *TheEvent; //-> Update event 
  35.     {
  36.     WindowPtr UpdtWind; //-> Window to update
  37.     GrafPtr   SavePort; //-> Saved port
  38.  
  39.     GetPort (&SavePort);
  40.     UpdtWind = (WindowPtr) TheEvent->message;
  41.     SetPort (UpdtWind);
  42.     BeginUpdate (UpdtWind);
  43.     EraseRect (&UpdtWind->portRect);
  44.     DrawCursWind (UpdtWind);
  45.     EndUpdate (UpdtWind);
  46.     SetPort (SavePort);
  47.     }
  48.  
  49.  
  50. #pragma segment Main
  51. /******************************************************************************\
  52. * DoActivateEvent - Handles a window activate event
  53. *
  54. * DoActivateEvent handles a window activate event.
  55. \******************************************************************************/
  56.  
  57. void
  58. DoActivateEvent (ActiveWind, Active)
  59.     WindowPeek ActiveWind; //-> Window requiring activation/deactivation >>
  60.     short      Active;     //True if activating, false if deactivating >>
  61.     {
  62.     }
  63.  
  64.  
  65. #pragma segment Main
  66. /******************************************************************************\
  67. * DoContentEvent - Handle click in the windows content region
  68. *
  69. * DoContentEvent handles a click in the content region of the window specified
  70. * by ClickWind.  TheEvent points to the event record that recorded this click.
  71. \******************************************************************************/
  72.  
  73. void
  74. DoContentEvent (TheEvent, ClickWind)
  75.     EventRecord *TheEvent; //-> Drag click event >>
  76.     WindowPtr   ClickWind; //-> Clicked window >>
  77.     {
  78.     if (ClickWind != FrontWindow ())
  79.         SelectWindow (ClickWind);
  80.     else if (windKindPtr (ClickWind) == cursWindKind)
  81.         ContentCursWind (TheEvent, ClickWind);
  82.     }
  83.  
  84.  
  85. #pragma segment Main
  86. /******************************************************************************\
  87. * DoDragEvent - Handle click in title bar
  88. *
  89. * DoDragEvent handles a click in the title bar to drag the window to a new
  90. * location.
  91. \******************************************************************************/
  92.  
  93. void
  94. DoDragEvent (TheEvent, ClickWind)
  95.     EventRecord *TheEvent; //-> Drag click event
  96.     WindowPtr   ClickWind; //-> Clicked window
  97.     {
  98.     Rect      LimitRect;  //Rect to limit dragging to
  99.     RgnHandle GrayRegion; //=> Desktop gray region
  100.  
  101.     GrayRegion = GetGrayRgn ();
  102.     LimitRect = (**GrayRegion).rgnBBox;
  103.     DragWindow (ClickWind, TheEvent->where, &LimitRect);
  104.     }
  105.  
  106.  
  107. #pragma segment Main
  108. /******************************************************************************\
  109. * DoGoAwayEvent - Handle click in close box
  110. *
  111. * 
  112. \******************************************************************************/
  113.  
  114. void
  115. DoGoAwayEvent (TheEvent, ClickWind)
  116.     EventRecord *TheEvent; //-> Drag click event >>
  117.     WindowPtr   ClickWind; //-> Clicked window <>
  118.     {
  119.     if (TrackGoAway (ClickWind, TheEvent->where))
  120.         {
  121.         if (windKindPtr (ClickWind) == cursWindKind)
  122.             CloseCursWind (ClickWind);
  123.         }
  124.     }
  125.  
  126.  
  127. #pragma segment Main
  128. /******************************************************************************\
  129. * DoZoomEvent - Handle click in zoom box
  130. *
  131. * DoZoomEvent handles a click in the zoom box of the window specified by
  132. * ClickWind.  
  133. \******************************************************************************/
  134.  
  135. void
  136. DoZoomEvent (TheEvent, ClickWind, PartCode)
  137.     EventRecord *TheEvent; //-> Drag click event >>
  138.     WindowPtr   ClickWind; //-> Clicked window <>
  139.     short       PartCode;  //inZoomIn or inZoomOut >>
  140.     {
  141.     GrafPtr CurrPort; //-> Current GrafPort
  142.  
  143.     if (TrackBox (ClickWind, TheEvent->where, PartCode))
  144.         {
  145.         GetPort (&CurrPort);
  146.         SetPort (ClickWind);
  147.         ZoomWindow (ClickWind, PartCode, true);
  148.         SetPort (CurrPort);
  149.         }
  150.     }
  151.  
  152.  
  153. #pragma segment Main
  154. /******************************************************************************\
  155. * CloseAllWindows - Close all open windows
  156. *
  157. * CloseAllWindows closes all the open windows.
  158. \******************************************************************************/
  159.  
  160. void
  161. CloseAllWindows ()
  162.     {
  163.     WindowPeek TheWindow; //-> window to close
  164.  
  165.     TheWindow = (WindowPeek) FrontWindow ();
  166.     while (TheWindow != (WindowPeek) null)
  167.         {
  168.         if (windKindPtr (TheWindow) < 0)
  169.             CloseDeskAcc (windKindPtr (TheWindow));
  170.         else if (windKindPtr (TheWindow) == cursWindKind);
  171.             CloseCursWind ((WindowPtr) TheWindow);
  172.         TheWindow = TheWindow->nextWindow;
  173.         }
  174.     }
  175.  
  176.  
  177. #pragma segment Main
  178. /******************************************************************************\
  179. * SetWindSize - Set user and standard sizes of window
  180. *
  181. * SetWindSize sets the user and standard sizes of the window specified by
  182. * TheWindow.  The userState and stdState rectangles in TheWindow’s WStateData
  183. * record are set to the main screen rectangle minus the menu bar and a certain
  184. * amount specified by the userWindMarg and stdWindMarg.
  185. \******************************************************************************/
  186.  
  187. void
  188. SetWindSize (TheWindow)
  189.     WindowPtr TheWindow; //-> Window to resize <>
  190.     {
  191.     Rect       WindRect;     //Rectangle of windows’s user and standard sizes
  192.     WStateData **WindStates; //=> Window zoom rectangles
  193.  
  194.     WindStates = (WStateData **) ((WindowPeek) TheWindow)->dataHandle;
  195.     WindRect = qd.screenBits.bounds;
  196.     WindRect.top += GetMBarHeight () + titleBarHeight;
  197.     InsetRect (&WindRect, userWindMarg, userWindMarg);
  198.     (**WindStates).userState = WindRect;
  199.     WindRect = qd.screenBits.bounds;
  200.     WindRect.top += GetMBarHeight () + titleBarHeight;
  201.     InsetRect (&WindRect, stdWindMarg, stdWindMarg);
  202.     (**WindStates).stdState = WindRect;
  203.     }
  204.  
  205.  
  206. #pragma segment Main
  207. /******************************************************************************\
  208. * FrontWindKind - Return pointer to frontmost window of a kind
  209. *
  210. * FrontWindKind returns a pointer to the frontmost window with a windowKind
  211. * field equal to WindKind.  If there aren't any windows with that windowKind,
  212. * null is returned.
  213. \******************************************************************************/
  214.  
  215. WindowPtr
  216. FrontWindKind (WindKind)
  217.     short WindKind; //Window kind to search for
  218.     {
  219.     WindowPeek CheckWind; //-> Window to check on
  220.  
  221.     CheckWind = (WindowPeek) FrontWindow ();
  222.     while (CheckWind != (WindowPeek) null && CheckWind->windowKind != WindKind)
  223.         CheckWind = CheckWind->nextWindow;
  224.     return (WindowPtr) CheckWind;
  225.     }
  226.